home *** CD-ROM | disk | FTP | other *** search
/ Night Owl 6 / Night Owl's Shareware - PDSI-006 - Night Owl Corp (1990).iso / 023a / prop_man.zip / SIZE.SAB < prev    next >
Text File  |  1991-02-18  |  1KB  |  36 lines
  1. set messages off
  2. set error messages off
  3. set bell off
  4. clear all v
  5. label start
  6. cls
  7. display cp.dis
  8. write "SIZE.SAB" AT 2,36
  9. write "Changing Size In Current Master And Property Files" at 4,14
  10. set v qaz to ""
  11. fillin qaz using "Enter Add.Code (or <ESC> ) ->  " at 6,20
  12.   if qaz = "" then ; goto end ; endif
  13. set v qaz1 to size in property where add.code = .qaz
  14. set v qaz2 to size in cur.mast where add.code = .qaz
  15. write "Property File......... " at 10,20
  16. write "Current Master Size... " at 11,20
  17. write .qaz1 at 10,45
  18. write .qaz2 at 11,45
  19. set v zaq to ""
  20. fillin zaq using "Enter New Size Specifications  " at 13,20
  21. set v esc to ""
  22. fillin esc using "Change CUR.MAST & PROPERTY To New Size? " at 15,20
  23.   if esc = "y" or esc = "yes" then ; goto yes ; endif
  24.     goto start
  25. label yes
  26. cls
  27. write "Changing SIZE In Property And Current Master Files" at 15,16
  28. write "Please  Wait" at 16,34
  29.   change size to .zaq in property where add.code = .qaz
  30.   change size to .zaq in cur.mast where add.code = .qaz
  31. goto start
  32. label end
  33.   cls
  34.   return
  35.  
  36.